From: Katsumi Yamaoka Date: Sun, 7 Nov 2010 01:10:01 +0000 (+0000) Subject: gnus-gravatar.el (gnus-gravatar-transform-address): No need to skip asterisks in... X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~324^2~5765 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=7c19717a3a3577d38dc8eab8b4cad94a23bc168c;p=emacs.git gnus-gravatar.el (gnus-gravatar-transform-address): No need to skip asterisks in From header. --- diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 837c8c574c8..893bf6938ce 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,8 @@ +2010-11-07 Katsumi Yamaoka + + * gnus-gravatar.el (gnus-gravatar-transform-address): No need to skip + asterisks in From header. + 2010-11-06 Lars Magne Ingebrigtsen * gnus-ems.el (gnus-put-image): Use a blank text as the insertion diff --git a/lisp/gnus/gnus-gravatar.el b/lisp/gnus/gnus-gravatar.el index 2444c9e7818..a6ecd43ef7e 100644 --- a/lisp/gnus/gnus-gravatar.el +++ b/lisp/gnus/gnus-gravatar.el @@ -63,14 +63,11 @@ (gravatar-size gnus-gravatar-size) name) (dolist (address addresses) - (when (and (setq name (cdr address)) - (string-match "\\`\\*+ " name)) ;; (X-)Faces exist. - (setcdr address (setq name (substring name (match-end 0))))) (when (or force (not (and gnus-gravatar-too-ugly (or (string-match gnus-gravatar-too-ugly (car address)) - (and name + (and (setq name (cdr address)) (string-match gnus-gravatar-too-ugly name)))))) (ignore-errors